home *** CD-ROM | disk | FTP | other *** search
/ PC World 2006 November / PCWorld_2006-11_cd.bin / system / innosetup / isetup-5.1.8.exe / {app} / Examples / 64BitThreeArch.iss < prev    next >
Text File  |  2006-10-03  |  2KB  |  49 lines
  1. ; -- 64BitThreeArch.iss --
  2. ; Demonstrates how to install a program built for three different
  3. ; architectures (x86, x64, Itanium) using a single installer.
  4.  
  5. ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING .ISS SCRIPT FILES!
  6.  
  7. [Setup]
  8. AppName=My Program
  9. AppVerName=My Program version 1.5
  10. DefaultDirName={pf}\My Program
  11. DefaultGroupName=My Program
  12. UninstallDisplayIcon={app}\MyProg.exe
  13. Compression=lzma
  14. SolidCompression=yes
  15. OutputDir=userdocs:Inno Setup Examples Output
  16. ; "ArchitecturesInstallIn64BitMode=x64 ia64" requests that the install
  17. ; be done in "64-bit mode" on x64 & Itanium, meaning it should use the
  18. ; native 64-bit Program Files directory and the 64-bit view of the
  19. ; registry. On all other architectures it will install in "32-bit mode".
  20. ArchitecturesInstallIn64BitMode=x64 ia64
  21.  
  22. [Files]
  23. ; Install MyProg-x64.exe if running on x64, MyProg-IA64.exe if
  24. ; running on Itanium, MyProg.exe otherwise.
  25. Source: "MyProg-x64.exe"; DestDir: "{app}"; DestName: "MyProg.exe"; Check: IsX64
  26. Source: "MyProg-IA64.exe"; DestDir: "{app}"; DestName: "MyProg.exe"; Check: IsIA64
  27. Source: "MyProg.exe"; DestDir: "{app}"; Check: IsOtherArch
  28. Source: "MyProg.chm"; DestDir: "{app}"
  29. Source: "Readme.txt"; DestDir: "{app}"; Flags: isreadme
  30.  
  31. [Icons]
  32. Name: "{group}\My Program"; Filename: "{app}\MyProg.exe"
  33.  
  34. [Code]
  35. function IsX64: Boolean;
  36. begin
  37.   Result := Is64BitInstallMode and (ProcessorArchitecture = paX64);
  38. end;
  39.  
  40. function IsIA64: Boolean;
  41. begin
  42.   Result := Is64BitInstallMode and (ProcessorArchitecture = paIA64);
  43. end;
  44.  
  45. function IsOtherArch: Boolean;
  46. begin
  47.   Result := not IsX64 and not IsIA64;
  48. end;
  49.